PC World Multimedia Live! 1997 June/Multimedia Live (PC World)(June 1997 - Volume 2.12).ISO/sharware/tools/hj-ins~1/install.exe/RCDATA/TFORMMAIN/TFORMMAIN.txt

Text File | 1997-03-08 | 6KB | 253 lines

object FormMain: TFormMain
  Left = 155
  Top = 108
  BorderStyle = bsNone
  Caption = 'FormMain'
  ClientHeight = 367
  ClientWidth = 508
  Color = clOlive
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  Visible = True
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object PanelInstall: TPanel
    Left = 5
    Top = 5
    Width = 498
    Height = 357
    TabOrder = 0
    Visible = False
    object Label1: TLabel
      Left = 9
      Top = 246
      Width = 21
      Height = 16
      Caption = '.....'
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object LabelTitle: TLabel
      Left = 12
      Top = 16
      Width = 218
      Height = 29
      Caption = 'HJSplit installation'
      Font.Color = clBlack
      Font.Height = -24
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Memo1: TMemo
      Left = 8
      Top = 56
      Width = 481
      Height = 169
      TabStop = False
      Color = clAqua
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = 'Arial'
      Font.Style = []
      Lines.Strings = (
        '')
      ParentFont = False
      ReadOnly = True
      ScrollBars = ssVertical
      TabOrder = 2
    end
    object Edit1: TEdit
      Left = 8
      Top = 264
      Width = 417
      Height = 24
      Color = clAqua
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 1
    end
    object ButtonScript: TButton
      Left = 376
      Top = 312
      Width = 113
      Height = 33
      Caption = '&Next >>'
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
    end
    object ButtonAbort: TButton
      Left = 10
      Top = 312
      Width = 65
      Height = 33
      Caption = '&Quit'
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 3
      TabStop = False
      OnClick = ButtonAbortClick
    end
    object ButtonEdit: TButton
      Left = 424
      Top = 264
      Width = 65
      Height = 24
      Caption = '&More...'
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 4
    end
  end
  object PanelAbout: TPanel
    Left = 5
    Top = 5
    Width = 500
    Height = 356
    Caption = 'PanelAbout'
    Color = clSilver
    TabOrder = 1
    object Label2: TLabel
      Left = 115
      Top = 16
      Width = 310
      Height = 74
      Caption = 'HJ-Install'
      Font.Color = clWhite
      Font.Height = -64
      Font.Name = 'Arial'
      Font.Style = [fsBold, fsItalic]
      ParentFont = False
    end
    object Label5: TLabel
      Left = 112
      Top = 14
      Width = 305
      Height = 74
      Caption = 'HJ-Install'
      Font.Color = clPurple
      Font.Height = -64
      Font.Name = 'Arial'
      Font.Style = [fsBold, fsItalic]
      ParentFont = False
      Transparent = True
    end
    object Label4: TLabel
      Left = 128
      Top = 128
      Width = 256
      Height = 17
      Caption = 'http://www.freebyte.com/freew1.htm'
      Font.Color = clYellow
      Font.Height = -15
      Font.Name = 'Arial'
      Font.Style = [fsBold, fsItalic]
      ParentFont = False
    end
    object Label3: TLabel
      Left = 106
      Top = 88
      Width = 297
      Height = 34
      Caption = 'The freeware installer'
      Font.Color = clPurple
      Font.Height = -29
      Font.Name = 'Arial'
      Font.Style = [fsBold, fsItalic]
      ParentFont = False
    end
    object Memo2: TMemo
      Left = 15
      Top = 160
      Width = 472
      Height = 129
      Color = clAqua
      Lines.Strings = (
        'Version 1.6'
        'Created by Henk Hagedoorn'
        'March 1997'
        'Amsterdam'
        '[e-mail]'
        '[e-mail]'
        ''
        'For updates and other programs look at '
        'http://www.freebyte.com'
        'http://www.freebyte.com/freew1.htm'
        'http://hjh.simplex.nl/~hjh'
        ''
        'This installation program is free.'
        'However, any financial contributions'
        'to support future software development'
        'are welcome. You can contact'
        'me for this at [e-mail].'
        ''
        'For programming assignments and other '
        'projects mail me at [e-mail]'
        ''

          'You can distribute and use this installation program without any' +
          ' '
        'restrictions as freeware. You may even create a HJ-Install  '

          'installation procedure for a commercial program. You may however' +
          ' '
        'not change the HJ-Install program itself.'
        ''

          'The current version is somewhat limited, but future versions wil' +
          'l '
        'have more possibilities.'
        'Check the www site for downloading HJ-Install with installation '

          'script examples and a manual. Check this site also for updates a' +
          'nd '
        'other software.')
      ReadOnly = True
      ScrollBars = ssVertical
      TabOrder = 0
    end
    object ButtonNext: TButton
      Left = 375
      Top = 311
      Width = 113
      Height = 33
      Caption = '&Next >>'
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      OnClick = ButtonNextClick
    end
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 300
    Left = 477
    Top = 5
  end
end